home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 22 / Amiga Format AFCD22 (Jan 1998, Issue 106).iso / -seriously_amiga- / shareware / graphics / sviewng / superviewlibrary / install_svlib < prev    next >
Text File  |  1997-11-05  |  21KB  |  615 lines
  1. ; $VER: Install_SVLib V19.4 (1.10.97)
  2. ; © 1993-97 by Andreas R. Kleinert.
  3. ; This is the Installer Script for superview.library V19+
  4. ; Italian strings by Alessandro Basso (cralex@amiga.dei.unipd.it)
  5. ; Norwegian strings by Roger Hågensen (msi@sn.no)
  6. ; French strings by Julien Wilk (wilkj@esiee.fr)
  7.  
  8.  
  9. (set @app-name "SuperView-Library")
  10. (welcome "SuperView-Library Installation")
  11.  
  12. (message (cat "If you are running MCP and don't disable the\n"
  13.               "following patches, you may encounter big problems:\n\n"
  14.               "- new tooltypes\n"
  15.               "- reqtols patch\n"
  16.               "- onereq\n"
  17.               "- library search\n"
  18.               "- SetRGB32\n"
  19.               "\nYou may wish to ask the authors of MCP to fix this\n"
  20.               "- if not already done. So, be warned !"))
  21.  
  22. (set #cpu (database "cpu")) (if (> (exists ("sys:libs/68060.library")) 0)   (set #cpu     "68060")  )
  23. (set #ppc_cpu "none")       (if (> (exists ("sys:libs/ppc.library")) 0)     (set #ppc_cpu "PPC60x") )
  24.                             (if (> (exists ("sys:libs/PowerPC.library")) 0) (set #ppc_cpu "PPC60x") )
  25.  
  26. (set #ppc_cpu "PPC60x")
  27.  
  28. (if (= #ppc_cpu "PPC60x")
  29.  (
  30.   (message (cat "\nWhen using SuperView-Libraries' PPC-Modules, make\n"
  31.                 "sure, that you don't have powerpc.library V12+\n"
  32.                 "installed together with ppc.library.\n\n"
  33.                 "Powerpc.library V7 will work, though.")
  34.   )
  35.  )
  36. )
  37.  
  38. ; *** english is default language
  39.  
  40.     (set #Msg_Yes "Yes")
  41.     (set #Msg_No  "No")
  42.     (set #Msg_BasicConfig "What's your basic configuration ?")
  43.     (set #Gfx0  "Not specified (do not change)")
  44.     (set #Gfx1  "Amiga OCS/ECS, no GfxCard")
  45.     (set #Gfx2  "Amiga AGA, no GfxCard")
  46.     (set #Gfx3  "CD-32 AGA, no GfxCard")
  47.     (set #Gfx4  "Card with CyberGraphX emulation")
  48.     (set #Gfx5  "Card with Picasso96 emulation")
  49.     (set #Gfx6  "Card with EGS emulation")
  50.     (set #Gfx7  "Picasso II(+)/IV")
  51.     (set #Gfx8  "Retina Z2/BLT Z3")
  52.     (set #Gfx9  "Merlin II")
  53.     (set #Gfx10 "OpalVision")
  54.     (set #Gfx11 "Amiga OCS/ECS/AGA, other GfxCard")
  55.     (set #Msg_CopyEnvConfig "Copying appropriate configuration to ENV:")
  56.     (set #Msg_LibPath "Library Path")
  57.     (set #Msg_InstallingLibs "Copying Libraries...")
  58.     (set #Msg_Ghostscript (cat "\nDo you already have Ghostscript installed ?\n\n"
  59.                                "(When answering with <Yes>, you have to supply\n"
  60.                                " the program's path and name here.)\n"
  61.                          )
  62.     )
  63.     (set #Msg_GSPath "Path and name of Ghostscript executable")
  64.     (set #Msg_MetaView    (cat "\nDo you already have MetaView installed ?\n\n"
  65.                                "(When answering with <Yes>, you have to supply\n"
  66.                                " the program's path and name here.)\n"
  67.                          )
  68.     )
  69.     (set #Msg_MVPath "Path and name of MetaView executable")
  70.     (set #Msg_CatPath "Catalog Path")
  71.     (set #Msg_InstallingCats "Copying catalog files...")
  72.     (set #Msg_VMEM "Now modifying your S:User-Startup for VMem-Support...")
  73.     (set #Msg_VMemPath "Virtual Memory Path")
  74.     (set #Msg_CopyPrefs "Copy SVPrefs to SYS:Prefs ?")
  75.     (set #Msg_PackerSupport "Install PackerSupport right now ?")
  76.     (set #Msg_SQOperators "Install SQ-Operators right now ?")
  77.     (set #Msg_Ready "SuperView-Library has been installed now.\nIf this was an Update, you should\nreboot your computer now.")
  78.  
  79.  
  80. (if (= @language "deutsch")
  81.   (
  82.     (set #Msg_Yes "Ja")
  83.     (set #Msg_No  "Nein")
  84.     (set #Msg_BasicConfig "Was ist Ihre Grundkonfiguration ?")
  85.     (set #Gfx0  "Keine Angabe (nichts ändern)")
  86.     (set #Gfx1  "Amiga OCS/ECS, keine Grafikkarte")
  87.     (set #Gfx2  "Amiga AGA, keine Grafikkarte")
  88.     (set #Gfx3  "CD-32 AGA, keine Grafikkarte")
  89.     (set #Gfx4  "Karte mit CyberGraphX-Emulation")
  90.     (set #Gfx5  "Karte mit Picasso96-Emulation")
  91.     (set #Gfx6  "Karte mit EGS-Emulation")
  92.     (set #Gfx7  "Picasso II(+)/IV")
  93.     (set #Gfx8  "Retina Z2/BLT Z3")
  94.     (set #Gfx9  "Merlin II")
  95.     (set #Gfx10 "OpalVision")
  96.     (set #Gfx11 "Amiga OCS/ECS/AGA, andere Grafikkarte")
  97.     (set #Msg_CopyEnvConfig "Kopiere notwendige Konfiguration nach ENV:")
  98.     (set #Msg_LibPath "Library-Pfad")
  99.     (set #Msg_InstallingLibs "Kopiere Libraries...")
  100.     (set #Msg_Ghostscript (cat "\nHaben Sie bereits Ghostscript installiert ?\n\n"
  101.                                "(Falls <Ja>, müssen Sie hier nun den\n"
  102.                                " Programmpfad und -namen angeben.)\n"
  103.                          )
  104.     )
  105.     (set #Msg_GSPath "Pfad und Name des Ghostscript-Programmes")
  106.     (set #Msg_MetaView    (cat "\nHaben Sie bereits MetaView installiert ?\n\n"
  107.                                "(Falls <Ja>, müssen Sie hier nun den\n"
  108.                                " Programmpfad und -namen angeben.)\n"
  109.                          )
  110.     )
  111.     (set #Msg_MVPath "Pfad und Name des MetaView-Programmes")
  112.     (set #Msg_CatPath "Katalogpfad")
  113.     (set #Msg_InstallingCats "Kopiere Katalogdateien...")
  114.     (set #Msg_VMEM "Ändere jetzt S:User-Startup für VMem-Unterstützung...")
  115.     (set #Msg_VMemPath "Pfad für virtuellen Speicher")
  116.     (set #Msg_CopyPrefs "SVPrefs nach SYS:Prefs kopieren ?")
  117.     (set #Msg_PackerSupport "Packer-Unterstützung jetzt gleich installieren ?")
  118.     (set #Msg_SQOperators "SQ-Operators jetzt gleich installieren ?")
  119.     (set #Msg_Ready "SuperView-Library wurde installiert.\nFalls dies ein Update war, sollten Sie ggf.\nIhren Rechner nun neu starten.")
  120.   )
  121. )
  122.  
  123. (if (= @language "italiano")
  124.   (
  125.     (set #Msg_Yes "Si")
  126.     (set #Msg_No  "No")
  127.     (set #Msg_BasicConfig "Qual è la tua configurazione base ?")
  128.     (set #Gfx0  "Non specificata (da non cambiare)")
  129.     (set #Gfx1  "Amiga OCS/ECS, senza SchedaGfx")
  130.     (set #Gfx2  "Amiga AGA, senza SchedaGfx")
  131.     (set #Gfx3  "CD-32 AGA, senza SchedaGfx")
  132.     (set #Gfx4  "Scheda con Emulazione-CyberGraphX")
  133.     (set #Gfx5  "Scheda con Emulazione-Picasso96")
  134.     (set #Gfx6  "Scheda con Emulazione-EGS")
  135.     (set #Gfx7  "Picasso II(+)/IV")
  136.     (set #Gfx8  "Retina Z2/BLT Z3")
  137.     (set #Gfx9  "Merlin II")
  138.     (set #Gfx10 "OpalVision")
  139.     (set #Gfx11 "Amiga OCS/ECS/AGA, altra SchedaGfx")
  140.     (set #Msg_CopyEnvConfig "Sto copiando configurazione appropriata in ENV:")
  141.     (set #Msg_LibPath "Percorso Libreria")
  142.     (set #Msg_InstallingLibs "Sto copiando Librerie...")
  143.     (set #Msg_Ghostscript (cat "\nHai già installato il Ghostscript ?\n\n"
  144.                                "(Se rispondi con <Si>, dovrai fornire\n"
  145.                                "nome e percorso del programma qui.)\n"
  146.                          )
  147.     )
  148.     (set #Msg_GSPath "Percorso e nome dell'eseguibile Ghostscript")
  149.     (set #Msg_MetaView    (cat "\nHai già installato il MetaView ?\n\n"
  150.                                "(Se rispondi con <Si>, dovrai fornire\n"
  151.                                "nome e percorso del programma qui.)\n"
  152.                          )
  153.     )
  154.     (set #Msg_MVPath "Percorso e nome dell'eseguibile MetaView")
  155.     (set #Msg_CatPath "Percorso Catalogo")
  156.     (set #Msg_InstallingCats "Sto copiando files del catalogo...")
  157.     (set #Msg_VMEM "Ora modifico la tua S:User-Startup per supporto-VMem...")
  158.     (set #Msg_VMemPath "Percorso Memoria Virtuale")
  159.     (set #Msg_CopyPrefs "Copio SVPrefs in SYS:Prefs ?")
  160.     (set #Msg_PackerSupport "Installo Supporto-Packer adesso ?")
  161.     (set #Msg_SQOperators "Installo Operatori-SQ adesso ?")
  162.     (set #Msg_Ready "Libreria-SuperView è stata ora installata.\nSe questo fosse un Aggiornamento, dovresti\neseguire un reboot del tuo computer ora.")
  163.   )
  164. )
  165.  
  166. (if (= @language "norsk")
  167.   (
  168.     (set #Msg_Yes "Ja")
  169.     (set #Msg_No  "Nei")
  170.     (set #Msg_BasicConfig "Hva er din standard konfigurasjon ?")
  171.     (set #Gfx0  "Ikke spesifisert (ikke forandre)")
  172.     (set #Gfx1  "Amiga OCS/ECS, ingen GfxKort")
  173.     (set #Gfx2  "Amiga AGA, ingen GfxKort")
  174.     (set #Gfx3  "CD-32 AGA, ingen GfxKort")
  175.     (set #Gfx4  "Kort med CyberGraphX emulasjon")
  176.     (set #Gfx5  "Kort med Picasso96 emulasjon")
  177.     (set #Gfx6  "Kort med EGS emulasjon")
  178.     (set #Gfx7  "Picasso II(+)/IV")
  179.     (set #Gfx8  "Retina Z2/BLT Z3")
  180.     (set #Gfx9  "Merlin II")
  181.     (set #Gfx10 "OpalVision")
  182.     (set #Gfx11 "Amiga OCS/ECS/AGA, annet GfxKort")
  183.     (set #Msg_CopyEnvConfig "Kopierer passende konfigurasjon til ENV:")
  184.     (set #Msg_LibPath "Bibliotek Sti (Library)")
  185.     (set #Msg_InstallingLibs "Kopierer Bibliotek...")
  186.     (set #Msg_Ghostscript (cat "\nHar du allerede Ghostscript installert ?\n\n"
  187.                                "(Når du svarer med <Ja>, må du gi stien til\n"
  188.                                " programmet og programmets navn her.)\n"
  189.                          )
  190.     )
  191.     (set #Msg_GSPath "Sti og navn til Ghostscript program")
  192.     (set #Msg_MetaView    (cat "\nHar du allerede MetaView installert ?\n\n"
  193.                                "(Når du svarer med <Ja>, må du gi stien til\n"
  194.                                " programmet og programmets navn her.)\n"
  195.                          )
  196.     )
  197.     (set #Msg_MVPath "Stio og nanv til MetaView program")
  198.     (set #Msg_CatPath "Katalog Sti")
  199.     (set #Msg_InstallingCats "Kopierer katalog filer...")
  200.     (set #Msg_VMEM "Modifiserer nå S:User-Startup for VMem-Støtte...")
  201.     (set #Msg_VMemPath "Virtuellt Minne Sti")
  202.     (set #Msg_CopyPrefs "Kopier SVPrefs til SYS:Prefs ?")
  203.     (set #Msg_PackerSupport "Installer PackerStøtte nå?")
  204.     (set #Msg_SQOperators "Installer SQ-Operatører (Operators) nå ?")
  205.     (set #Msg_Ready "SuperView-Library er nå installert.\nHvis dette var en Oppdatering, bør du\nstarte maskinen på nytt.")
  206.   )
  207. )
  208.  
  209. (if (= @language "français")
  210.   (
  211.     (set #Msg_Yes "Oui")
  212.     (set #Msg_No  "Non")
  213.     (set #Msg_BasicConfig "Quelle est votre configuration de base ?")
  214.     (set #Gfx0  "Non listée (ne rien changer)")
  215.     (set #Gfx1  "Amiga OCS/ECS, pas de carte graphique")
  216.     (set #Gfx2  "Amiga AGA, pas de carte graphique")
  217.     (set #Gfx3  "CD-32 AGA, pas de carte graphique")
  218.     (set #Gfx4  "Carte avec émulation CyberGraphX")
  219.     (set #Gfx5  "Carte avec émulation Picasso96")
  220.     (set #Gfx6  "Carte avec émulation EGS")
  221.     (set #Gfx7  "Picasso II(+)/IV")
  222.     (set #Gfx8  "Retina Z2/BLT Z3")
  223.     (set #Gfx9  "Merlin II")
  224.     (set #Gfx10 "OpalVision")
  225.     (set #Gfx11 "Amiga OCS/ECS/AGA, autre carte graphique")
  226.     (set #Msg_CopyEnvConfig "Copie de la configuration appropriée dans ENV:")
  227.     (set #Msg_LibPath "Chemin des librairies")
  228.     (set #Msg_InstallingLibs "Copie des librairies...")
  229.     (set #Msg_Ghostscript (cat "\nAvez-vous déjà installé Ghostscript ?\n\n"
  230.                                "(Si vous répondez par <Oui>, il vous faudra fournir\n"
  231.                                " le chemin du programme et son nom.)\n"
  232.                          )
  233.     )
  234.     (set #Msg_GSPath "Chemin et nom de l'exécutable Ghostscript")
  235.     (set #Msg_MetaView    (cat "\nAvez-vous déjà installé MetaView ?\n\n"
  236.                                "(Si vous répondez par <Oui>, il vous faudra fournir\n"
  237.                                " le chemin du programme et son nom.)\n"
  238.                          )
  239.     )
  240.     (set #Msg_MVPath "Chemin et nom de l'exécutable MetaView")
  241.     (set #Msg_CatPath "Chemin des catalogues")
  242.     (set #Msg_InstallingCats "Copie des fichiers catalogues...")
  243.     (set #Msg_VMEM "Modification de votre S:User-Startup au niveau de VMem-Support...")
  244.     (set #Msg_VMemPath "Chemin de la mémoire virtuelle")
  245.     (set #Msg_CopyPrefs "Copier SVPrefs dans SYS:Prefs ?")
  246.     (set #Msg_PackerSupport "Installer le PackerSupport maintenant ?")
  247.     (set #Msg_SQOperators "Installer les SQ-Operators maintenant ?")
  248.     (set #Msg_Ready "SuperView-Library a été installé avec succès.\nS'il s'agissait d'une mise à jour, vous devriez\nredémarrer votre ordinateur maintenant.")
  249.   )
  250. )
  251.  
  252. ; **************************************************************************
  253. ; Create/Update basic configuration
  254.  
  255. (makedir "ENV:SuperView-Library")
  256. (makedir "ENVARC:SuperView-Library")
  257.  
  258. (set #selectsvdriver (askchoice
  259.                       (prompt #Msg_BasicConfig)
  260.                       (help @askchoice-help)
  261.                       (choices #Gfx0 #Gfx1 #Gfx2 #Gfx3 #Gfx4 #Gfx5 #Gfx6 #Gfx7 #Gfx8 #Gfx9 #Gfx10 #Gfx11)
  262.                       (default 1)
  263.                     )
  264. )
  265.  
  266. (if (= #selectsvdriver 1)  (set #env_source "docs/SampleConfigs/env_ECS")           )
  267. (if (= #selectsvdriver 2)  (set #env_source "docs/SampleConfigs/env_AGA")           )
  268. (if (= #selectsvdriver 3)  (set #env_source "docs/SampleConfigs/env_AGA_CD32")      )
  269. (if (= #selectsvdriver 4)  (set #env_source "docs/SampleConfigs/env_CyberGraphics") )
  270. (if (= #selectsvdriver 5)  (set #env_source "docs/SampleConfigs/env_Picasso96")     )
  271. (if (= #selectsvdriver 6)  (set #env_source "docs/SampleConfigs/env_EGS7")          )
  272. (if (= #selectsvdriver 7)  (set #env_source "docs/SampleConfigs/env_PicassoII")     )
  273. (if (= #selectsvdriver 8)  (set #env_source "docs/SampleConfigs/env_Retina")        )
  274. (if (= #selectsvdriver 9)  (set #env_source "docs/SampleConfigs/env_Merlin")        )
  275. (if (= #selectsvdriver 10) (set #env_source "docs/SampleConfigs/env_OpalVision")    )
  276. (if (= #selectsvdriver 11) (set #env_source "docs/SampleConfigs/env_GfxCards")      )
  277.  
  278. (if (> #selectsvdriver 0)
  279.   (
  280.     (copyfiles
  281.       (prompt #Msg_CopyEnvConfig)
  282.       (help @copyfiles-help)
  283.       (source #env_source)
  284.       (dest "ENV:")
  285.       (all)
  286.     )
  287.     (copyfiles
  288.       (prompt #Msg_CopyEnvConfig)
  289.       (help @copyfiles-help)
  290.       (source #env_source)
  291.       (dest "ENVARC:")
  292.       (all)
  293.     )
  294.   )
  295. )
  296.  
  297. (copyfiles
  298.   (prompt #Msg_CopyEnvConfig)
  299.   (help @copyfiles-help)
  300.   (source "env")
  301.   (dest "ENVARC:")
  302.   (all)
  303. )
  304.  
  305. ; **************************************************************************
  306. ; Install main libraries
  307.  
  308. (if (exists "ENVARC:SuperView-Library/SVLIB_WHERE") (set #svlibdir (getenv "SuperView-Library/SVLIB_WHERE"))
  309.  
  310.  (set #svlibdir "LIBS:")
  311. )
  312.  
  313. (if (= (exists (#svlibdir)) 0) (set #svlibdir "LIBS:") )
  314.  
  315. (set #svlibdir
  316.               (askdir
  317.                       (prompt #Msg_LibPath)
  318.                       (help @askdir-help)
  319.                       (newpath)
  320.                       (default #svlibdir)
  321.                )
  322. )
  323.  
  324. (delete "ENVARC:SuperView-Library/SVLIB_WHERE")
  325. (delete "ENV:SuperView-Library/SVLIB_WHERE")
  326. (textfile (dest "ENVARC:SuperView-Library/SVLIB_WHERE") (append #svlibdir) (safe))
  327. (textfile (dest "ENV:SuperView-Library/SVLIB_WHERE") (append #svlibdir) (safe))
  328.  
  329. (copylib
  330.   (prompt #Msg_InstallingLibs)
  331.   (help @copylib-help)
  332.   (source "libs/superview.library")
  333.   (dest #svlibdir)
  334. )
  335.  
  336. (set @default-dest #svlibdir)
  337.  
  338. (copylib
  339.   (prompt #Msg_InstallingLibs)
  340.   (help @copylib-help)
  341.   (source "libs/superviewsupport.library")
  342.   (dest #svlibdir)
  343. )
  344.  
  345. ; **************************************************************************
  346. ; Ask for Ghostscript
  347.  
  348. (set #gsquest (askchoice
  349.                 (prompt #Msg_Ghostscript)
  350.                 (help @askchoice-help)
  351.                 (choices #Msg_Yes #Msg_No)
  352.                 (default 1)
  353.               )
  354. )
  355.  
  356. (if (= #gsquest 0)
  357.   (
  358.     (set #gspath (askfile
  359.                   (prompt #Msg_GSPath)
  360.                   (help @askfile-help)
  361.                   (default "gs000")
  362.                 )
  363.     )
  364.     (set #gspathopt (cat "GS_PATH=" #gspath "\n"))
  365.     (textfile
  366.       (dest "ENV:SuperView-Library/Ghostscript.controlpad")
  367.       (append #gspathopt)
  368.     )
  369.     (copyfiles
  370.       (source "ENV:SuperView-Library/Ghostscript.controlpad")
  371.       (dest "ENVARC:SuperView-Library")
  372.     )
  373.   )
  374. )
  375.  
  376. ; **************************************************************************
  377. ; Ask for MetaView
  378.  
  379. (set #mvquest (askchoice
  380.                 (prompt #Msg_MetaView)
  381.                 (help @askchoice-help)
  382.                 (choices #Msg_Yes #Msg_No)
  383.                 (default 1)
  384.               )
  385. )
  386.  
  387. (if (= #mvquest 0)
  388.   (
  389.     (set #mvpath (askfile
  390.                   (prompt #Msg_MVPath)
  391.                   (help @askfile-help)
  392.                   (default "MetaView")
  393.                 )
  394.     )
  395.     (set #mvpathopt (cat "METAVIEW_PATH=" #mvpath "\n"))
  396.     (textfile
  397.       (dest "ENV:SuperView-Library/MetaView.controlpad")
  398.       (append #mvpathopt)
  399.     )
  400.     (copyfiles
  401.       (source "ENV:SuperView-Library/MetaView.controlpad")
  402.       (dest "ENVARC:SuperView-Library")
  403.     )
  404.   )
  405. )
  406.  
  407. ; **************************************************************************
  408. ; Install catalogs
  409.  
  410. (makedir "SYS:locale")
  411. (makedir "SYS:locale/catalogs")
  412.  
  413. (copyfiles
  414.   (prompt #Msg_InstallingCats)
  415.   (help @copyfiles-help)
  416.   (source "locale/catalogs")
  417.   (set #svcatdir
  418.               (askdir
  419.                      (prompt #Msg_CatPath)
  420.                      (help @askdir-help)
  421.                      (newpath)
  422.                      (default "SYS:locale/Catalogs")
  423.               )
  424.   )
  425.   (dest #svcatdir)
  426.   (all)
  427. )
  428.  
  429. ; **************************************************************************
  430. ; Install library modules
  431.  
  432. (set #svobjectdir   (tackon #svlibdir "svobjects"))
  433. (set #svdriverdir   (tackon #svlibdir "svdrivers"))
  434. (set #svoperatordir (tackon #svlibdir "svoperators"))
  435. (set #svstoredir    (tackon #svlibdir "svstorage"))
  436.  
  437. (makedir #svobjectdir)
  438. (makedir #svdriverdir)
  439. (makedir #svoperatordir)
  440. (makedir #svstoredir)
  441.  
  442. (copyfiles
  443.   (prompt #Msg_InstallingLibs)
  444.   (help @copyfiles-help)
  445.   (source "libs/svobjects")
  446.   (dest (tackon #svlibdir "svobjects"))
  447.   (pattern "#?")
  448.   (confirm)
  449.   (files)
  450. )
  451.  
  452. (if (exists(tackon #svobjectdir "SVO.svobject"))
  453.  (rename (tackon #svobjectdir "SVO.svobject") (tackon #svstoredir "SVO.svobject") (safe))
  454. )
  455.  
  456. (if (exists(tackon #svobjectdir "CyberDataType.svobject"))
  457.  (rename (tackon #svobjectdir "CyberDataType.svobject") (tackon #svstoredir "CyberDataType.svobject") (safe))
  458. )
  459.  
  460. (copyfiles
  461.   (prompt #Msg_InstallingLibs)
  462.   (help @copyfiles-help)
  463.   (source "libs/svdrivers")
  464.   (dest (tackon #svlibdir "svdrivers"))
  465.   (pattern "#?")
  466.   (confirm)
  467.   (files)
  468. )
  469.  
  470. (if (NOT (= #selectsvdriver 5))
  471.  (rename (tackon #svdriverdir "Picasso96.svdriver") (tackon #svstoredir "Picasso96.svdriver") (safe))
  472. )
  473.  
  474. (if (NOT (= #selectsvdriver 6))
  475.  (rename (tackon #svdriverdir "EGS7.svdriver") (tackon #svstoredir "EGS7.svdriver") (safe))
  476. )
  477.  
  478. (if (NOT (= #selectsvdriver 7))
  479.  (rename (tackon #svdriverdir "PicassoII.svdriver") (tackon #svstoredir "PicassoII.svdriver") (safe))
  480. )
  481.  
  482. (if (NOT (= #selectsvdriver 8))
  483.  (rename (tackon #svdriverdir "Retina.svdriver") (tackon #svstoredir "Retina.svdriver") (safe))
  484. )
  485.  
  486. (if (NOT (= #selectsvdriver 9))
  487.  (rename (tackon #svdriverdir "MERLIN.svdriver") (tackon #svstoredir "MERLIN.svdriver") (safe))
  488. )
  489.  
  490. (if (NOT (= #selectsvdriver 10))
  491.  (rename (tackon #svdriverdir "OPAL.svdriver") (tackon #svstoredir "OPAL.svdriver") (safe))
  492. )
  493.  
  494. (copyfiles
  495.   (prompt #Msg_InstallingLibs)
  496.   (help @copyfiles-help)
  497.   (source "libs/svoperators")
  498.   (dest (tackon #svlibdir "svoperators"))
  499.   (pattern "#?")
  500.   (confirm)
  501.   (files)
  502. )
  503.  
  504. (if (>= #cpu 68020)
  505.   (
  506.     (copyfiles
  507.       (prompt #Msg_InstallingLibs)
  508.       (help @copyfiles-help)
  509.       (source "libs/68030")
  510.       (dest #svlibdir)
  511.       (confirm)
  512.       (all)
  513.     )
  514.   )
  515. )
  516.  
  517. ; **************************************************************************
  518. ; Modify User-Startup
  519.  
  520. (if (exists "ENVARC:SuperView-Library/SVMEM_WHERE") (set #vmemdir (getenv "SuperView-Library/SVMEM_WHERE"))
  521.  
  522.  (set #vmemdir "T:")
  523. )
  524.  
  525. (if (= (exists (#vmemdir)) 0) (set #vmemdir "T:") )
  526.  
  527. (set #vmemdir
  528.               (askdir
  529.                 (prompt #Msg_VMemPath)
  530.                 (help @askdir-help)
  531.                 (newpath)
  532.                 (default #vmemdir)
  533.               )
  534. )
  535.  
  536. (delete "ENVARC:SuperView-Library/SVMEM_WHERE")
  537. (delete "ENV:SuperView-Library/SVMEM_WHERE")
  538. (textfile (dest "ENVARC:SuperView-Library/SVMEM_WHERE") (append #vmemdir) (safe))
  539. (textfile (dest "ENV:SuperView-Library/SVMEM_WHERE") (append #vmemdir) (safe))
  540.  
  541. (startup "SuperView-Library"
  542.   (prompt #Msg_VMEM)
  543.   (help @startup-help)
  544.   (command "Assign VMEM: "#vmemdir"\nSYS:Prefs/SVPrefs >NIL: <NIL: INIT\n")
  545. )
  546.  
  547. ; **************************************************************************
  548. ; Install SVPrefs
  549.  
  550. (copyfiles
  551.   (prompt #Msg_CopyPrefs)
  552.   (help @copyfiles-help)
  553.   (source "Prefs")
  554.   (dest "SYS:Prefs")
  555.   (all)
  556.   (confirm)
  557. )
  558.  
  559. ; **************************************************************************
  560. ; Ask for Packersupport
  561.  
  562. (if (exists "PackerSupport")
  563.   (
  564.     (set #ask_ps (askbool (prompt #Msg_PackerSupport) (help @askbool-help) ) )
  565.  
  566.     (if (= #ask_ps TRUE)
  567.       (
  568.         (copyfiles
  569.           (prompt #Msg_InstallingLibs)
  570.           (help @copyfiles-help)
  571.           (source "PackerSupport/libs/svobjects")
  572.           (dest (tackon #svlibdir "svobjects"))
  573.           (pattern "#?")
  574.           (files)
  575.         )
  576.       )
  577.     )
  578.   )
  579. )
  580.  
  581. ; **************************************************************************
  582. ; Ask for SQOperators
  583.  
  584. (if (exists "SQ-Operators")
  585.   (
  586.     (set #ask_sq (askbool (prompt #Msg_SQOperators) (help @askbool-help) ) )
  587.  
  588.     (if (= #ask_sq TRUE)
  589.       (
  590.         (copyfiles
  591.           (prompt #Msg_CopyEnvConfig)
  592.           (help @copyfiles-help)
  593.           (source "SQ-Operators/envarc")
  594.           (dest "ENVARC:")
  595.           (all)
  596.         )
  597.         (copyfiles
  598.           (prompt #Msg_InstallingLibs)
  599.           (help @copyfiles-help)
  600.           (source "SQ-Operators/libs/svoperators")
  601.           (dest (tackon #svlibdir "svoperators"))
  602.           (pattern "#?")
  603.           (confirm)
  604.           (files)
  605.         )
  606.       )
  607.     )
  608.   )
  609. )
  610.  
  611. ; **************************************************************************
  612. ; EOF ;-)
  613.  
  614. (exit #Msg_Ready)
  615.